home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple WWDC 1996
/
WWDC96_1996 (CD).toast
/
Technology Materials
/
MacOS 8 Resources
/
Developer Tools
/
Mac OS 8 Interfaces & Libraries
/
Interfaces
/
PInterfaces
/
ShutDown.p
< prev
next >
Wrap
Text File
|
1996-05-01
|
2KB
|
99 lines
{
File: ShutDown.p
Contains: Shutdown Manager Interfaces.
Version: Technology: System 7.5
Release: Universal Interfaces 3.0d3 on Copland DR1
Copyright: © 1984-1996 by Apple Computer, Inc. All rights reserved.
Bugs?: If you find a problem with this file, send the file and version
information (from above) and the problem description to:
Internet: apple.bugs@applelink.apple.com
AppleLink: APPLE.BUGS
}
{$IFC UNDEFINED UsingIncludes}
{$SETC UsingIncludes := 0}
{$ENDC}
{$IFC NOT UsingIncludes}
UNIT ShutDown;
INTERFACE
{$ENDC}
{$IFC UNDEFINED __SHUTDOWN__}
{$SETC __SHUTDOWN__ := 1}
{$I+}
{$SETC ShutDownIncludes := UsingIncludes}
{$SETC UsingIncludes := 1}
{$IFC UNDEFINED __TYPES__}
{$I Types.p}
{$ENDC}
{$IFC UNDEFINED __MIXEDMODE__}
{$I MixedMode.p}
{$ENDC}
{$PUSH}
{$ALIGN MAC68K}
{$LibExport+}
{$IFC FOR_SYSTEM7_AND_SYSTEM8_COOPERATIVE }
CONST
sdOnPowerOff = 1; { call procedure before power off. }
sdOnRestart = 2; { call procedure before restart. }
sdOnUnmount = 4; { call procedure before unmounting. }
sdOnDrivers = 8; { call procedure before closing drivers. }
sdRestartOrPower = 3; { call before either power off or restart. }
TYPE
ShutDwnProcPtr = Register68kProcPtr; { PROCEDURE ShutDwn(shutDownStage: INTEGER); }
ShutDwnUPP = UniversalProcPtr;
CONST
uppShutDwnProcInfo = $00001002;
FUNCTION NewShutDwnProc(userRoutine: ShutDwnProcPtr): ShutDwnUPP;
{$IFC NOT GENERATINGCFM }
INLINE $2E9F;
{$ENDC}
PROCEDURE CallShutDwnProc(shutDownStage: INTEGER; userRoutine: ShutDwnUPP);
{$IFC NOT GENERATINGCFM}
{To be implemented: Glue to move parameters into registers.}
{$ENDC}
PROCEDURE ShutDwnPower;
{$IFC NOT GENERATINGCFM}
INLINE $3F3C, $0001, $A895;
{$ENDC}
PROCEDURE ShutDwnStart;
{$IFC NOT GENERATINGCFM}
INLINE $3F3C, $0002, $A895;
{$ENDC}
PROCEDURE ShutDwnInstall(shutDownProc: ShutDwnUPP; flags: INTEGER);
{$IFC NOT GENERATINGCFM}
INLINE $3F3C, $0003, $A895;
{$ENDC}
PROCEDURE ShutDwnRemove(shutDownProc: ShutDwnUPP);
{$IFC NOT GENERATINGCFM}
INLINE $3F3C, $0004, $A895;
{$ENDC}
{$ENDC}
{$ALIGN RESET}
{$POP}
{$SETC UsingIncludes := ShutDownIncludes}
{$ENDC} {__SHUTDOWN__}
{$IFC NOT UsingIncludes}
END.
{$ENDC}